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ZTITLE ‘NM ee - , NAL Data Definitions’ 
IDENT = ‘v0Q4-000' 


sett fle! (c) 1978, 1980, 1982, 1984 BY 
DIGITAL EQUIPMENT CORPORATION, MAYNARD, MASSACHUSETTS. 
ALL RIGHTS RESERVED. 
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DIGITAL ASSUMES NO RESPONSIBILITY FOR THE USE OR RELIABILITY OF ITS 
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+ 
FACILITY: DECnet-VAX Network Management Listener 
ABSTRACT: 


This module contains macro and symbol definitions used by all NML modules. 
ENVIRONMENT: VAX/VMS Operating System 

AUTHOR: Distributed Systems Software Engineering 
CREATION DATE: 30-DEC-1979 

MODIFIED BY: 


v03-006 MKPO008 Kathy Perko 24-June-1984 
Increase the size + the Q10 o buffer to the minimum 
value SYSGEN allows for MAX BUFFER. This is a slight 
improvement on the Limit for the number of sources which 
can be logged for a single sink node. 


v03-005 MKP0007 Kathy Perko 9-Apr it-1983 
Add globals for executor address in the volatile and 
permanent databases. 


v03-004 MKP0006 Kathy Perko 19-Sepe t-1983 
Convert node pernanent database to mult 
performance. 
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iple ISAM keys for better 
Also, make NCP response message entity buffer 
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size bigger and global - for X25 tracepoint names. 


v03-003 MKP0005 Kathy Perko \pataceia 1983 
Delete service functions from NM 
v03-002 MKP0004 y Perko 28-June- 


Shrink P4 buffer” ste from 730 bytes to 335° to get rid 
+ Q10 quota exceeded errors. 
Add macro for generating Search Key IDs for Entity Table. 
Rename qualifier to use its CPT index instead of the Network 
Management parameter code. 


V03-001 MKP0003 Kath Y Perko 17-Mar-1982 
Rename some global fields so the names mean more. 


v02-002 MKP0002 eit Perko 2-Nov-1981 
Delete NMLSGW_CMD_CHAN 
v02-001 MKP0001 Kathy Perko 14-Sept-1981 


age buffer sles taal ler so systens with SYSGEN pergueter', 
MAXB don't ot buffer quota exceeded for SHOW CIRCUIT 
CHARACTERSITIC 


' 
Miscellaneous symbols 


LITERAL 
FALSE = 0, 
TRUE = 1; 


i The vot ayabets are internal pereneer codes. The values all have 
! bit 15 set, indicating a counter value, to avoid conflicts with other 
network management parameter codes. 


LITERAL 
NMASC_PCNO_ASS = 1 * 15 OR O, ! Loop node address 
NMASC_PCLI_LCS = 1 * 15 OR 1, ! Line counters 
$C_PCNO_EC$ = 1 * 15 OR ¢° ! Executor node counters 
NMASC_PCNO_NCS = 1 * 15 OR 3, ! Node counters 
NMASC_PCCI_CC$ = 1 * 15 OR 4, ! Circuit counters 
NMASC_PCXP_PC$ = 1 * 15 OR 5, : s Protocol DTE counters. 
NMASC_PCXS"“SC$ = 1 * 15 OR 6; ! x-25 Server counters 
! Structure declarations used for system defined structures to 


: save typing. 


STRUCTURE 
BBLOCK CO, P, S, E: N) = 


(BBLOCK+0)<P,S,E>, 
wee <*>) CI, 0, P, S, E; N, BS) = 
((BBLOCKVECTOR+1*BS)+0)<P,S,E>; 
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i Macro to generate Network ACP Control Q10 (NFB) P1 buffer contents. The NFB 
describes SET, SHOW, CLEAR, and ZERO operations. 


MACRO 
SNFB (FUNC, FLAGS, DATABASE, aren KEY_ONE, OPER_ONE 
H“KEY-TWO, OPER-TWOS = 

BYTE ( ge de (FUNC, 0) ! GIO function code. 
SELSe ZNAME ('NFBSC_FC_',FUNC) 

BYTE ( XIF ZNULL (FLAGS) t Error Update and Process 
XTHEN Multiple Entries flags. 
ertpe FLAGS 

BYTE ( TIF SIDENTICAL (DATABASE, 0) ! ACP database to update. 
arise ZNAME ('NFBSC_DB_* ,DATABASE) 

BYTE (RIF ENGL (OPER_ONE) ! Oper 
ZELSE OPER_ONE 
oe 

SSRCH_KEY (DATABASE, SRCH_KEY_ONE), ' Search key one ID 

SSRCH_KEY (DATABASE <— sKeve TWO), ! Search key two ID 

BYTE CIF BNULL (OPER_ i Oper2 
ZELSE OPER_TWO 
he 

BYTE (0), ! Spare 

WORD (0), ' variable cell size 

ZIF NOT ZNULL(ZREMAINING) 

ZTHEN SF Ft Se ID_LIST (DATABASE, ZREMAINING) 

ita ga (RFBSC_ENDOFLISTS ! End delimiter for field ID List. 

ert LONG (NFBSC_ENDOFLIST) ! End delimiter for field ID List. 

z, 

! 

i Generate a Search Key ID for an NFB. If the Search key is null, 
use a wildcard search key ID. 

$SRCH xeY (DAT SE, SRCH_ID) = 


LONG ( ZIF ZNULL (SRCA 1D) 
ZTHEN NFBSC_UWICDC 
ZeL SE SFIELB_ 1b COATABASE, SRCH_ID) 


Re Se Se Se Se Se Ge Se Se Se SO Sse Se Se Se SH Se Se Se Fe Se Se Se Se Se Se Ge Se Se Se Ge Se Se Se Se Se Se Se Se Se Se Se Se Se Fe Se Se Se Sees se Se Se ease 
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Generate a List of longwords containing the NETACP field IDs for 
the parameters. This iterative macro will generate as many 
field IDs as are supplied. 


' 
; 
i 
! 
$FIELD_ID LIST (DATABASE) CFIELD_1D) = 
LORG TSFIELD_ID (DATABASE, FIELD_ID)) 


SFIELD_1D (DATABASE, FIEL 
RIF ZIDENTICAL (FIELD 
MIDENTICAL (FIELD 


FIELD_ID 
RELSE 
Z1F “tee (FIELD_ID) 
THEN 
aFHoe ZNAME ("NFBSC_* ,DATABASE,'_',FIELD_ID) 
2FI 
%; 


' 
: Macros to generate Network Control I/0 request descriptors. 


MACRO 


Declare the NFB buffer (use the number of input parameters to figure 
out how big to make it) and set up a descriptor for it. 


NFBDSC (NAM) = 
SWITCHES UNAMES; 
OWN 


NFB : VECTOR CSNFB_ALLOCATION (ZREMAINING) J 
INITIAL ($NFB (ZREMAINING)); 


IND 
NAME (NAM) = UPLIT (ZALLOCATION(_NFB), _NFB); 
UNDECLARE _NFB; 
gust Cnes NOUNAME S 


SNFB_ALLOCATION () = 
3+ (MAX (0, SLENGTH-6)) 


Macro to extract the bit number from bit field references 


MACRO 
SBITN (0, B, Ww, S) = 8B 


' 
: Macro to signal status message 
MACRO 
SSIGNAL_MSG [] = 
SIGRAL (NMLS$K_SIG_CODE, Z%REMAINING) 
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' 
Macro to create constant string descriptor 


MACRO 
SASCID () = 
(UPLIT CRCHARCOUNT (EST RING(ZREMAINING) ) 
: PLIT BYTE (XSTRING(ZREMAINING) 5)) 
CRO 
SASCIC C] = 


; UPLIT BYTE (ZASCIC ZRSTRING (ZREMAINING) ) 
} 
Macro to move an ASCII counted string to a buffer. 


MACRO 
SMOVE_ASCIC (STRING. PTR) = 
PTR = CHSMOVE ( BCHARCOUNT (ZASCIC STRING), 
UELIT BYTE (XASCIC STRING), 
Z; i 
ACRO 
DESCRIPTOR = 


BBLOCK (8) 
' ° 
: 1/0 Status Block definition 


FIELD 
oes | ste = 
IOS$W_STATUS = £9. 0. 16, 0), ! Status field 
1O0S$W_COUNT = (2, 0, 16, 0J, ! Byte count field 
1oss._ INFO = (4, 0, 32, 0) i Device dependent information 
MACRO 
10SB 


BBLOCK [8] FIELD (ICSB_FIELDS) 
' ° 
: Macro to define Network Management version fields 


FIELD 
NAV FIELDS = 
NMV$B_VERSION = £0.0.8.03. 
NMV$B_DEC_ECO = [1,0,8,0) 
NMV$B-USER_ECO = (2,6,8,05 
MACRO 


NMV = BBLOCK (3) FIELD (NMV_FIELDS) 


NMLODL .B32;1 


%; 
' 
Macro to define external symbols common 
MACRO SNML_EXTDEF = 
EXTERNAL 


Event data 

'  NMLSGB_EVTSRCTYP : BYTE 
NML$GQ"EVTSRCDSC : DESCRIPTOR, 
NAL SG EVTCLASS : WORD, 


' : BYTE 
NML$GQ-EVTMSKDSC : DESCRIPTOR, 
NMLSGWIEVTSNKADR : WORD, 


NMLS$GW_ACP_CHAN, 
SK 


NMLS$GL~LOGAA : BITVECTOR (32), 
NMLSGQ"ENTSTRDSC =: ~ DESCRIPTOR, 
$AB_Q1OBUF FE : BBLOCK (0), 
NML$GQ~QIOBFDSC : DESCRIPTOR, 
NMLSAB~EXEBUFFER VECTOR CC, BYTE), 
LSGL-EXEDATPTR, 
NML$GQ~EXEDATDSC DESCRIPTOR, 
“EXEBFDSC : DESCRIPTOR. 
LSAB-RCVBUFFER —: ~VECTOR [ 
NML$GQ-RCVBFDSC : DESCRIPTOR, 
NMLSAB“SNDBUFFER =: ~‘VECTOR [ 
~SNDBFDS : DESCRIPTOR, 
NMLS$GL-RCVDATLEN, 
“CPTABL : BBLOCKVECTOR CO 
“MSGBLOCK : BBLOCK CMSBSK_LENG 
NMLSAB~ENTITY : BBL Ck 16), 
wa SAB _OUAL IF TER ID : BBLO 16) 
LSAB-ENT 1 ITYDATA : BBLOCKY ECTOR C, 
NAL $AB_PRASER : BBLOCKY CTOR co, 
NMLSAL ENT INF TAB V CTOR 0) 
SAL ~PERMINF TAB VECTOR [03 
NMLSAW-PRM_DES : BE OCKVE CTO 
L$GB~CMD-VER : BYTE, 
NML$GB"ENTITY_CODE : BYTE. 
NML$GB"ENTITY FORMAT: BYTE. 
$GL-QUALIFTER_P 
NML$GB~QUA LIFLERCFORAAT: BYTE. 
$GB~ FUNCTION : BYTE, 
NAL $GB~ INFO : BYTE, 
$GB"OPTIONS : BYTE, 
NML$GL ~PRMCODE 
NMLS$GL~PRS_FLGS : BLOCK (1), 
L$GL“NML ENTITY, 
SGO-NETRAMDSC © : DESCRIPTOR, 


GQ" RECBFDSC : DESCRIPTOR, 
NMLSGW PRMDE SCNT : WORD; 
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to most of the modules. 


Event source type 

Event source descriptor 
Event class 

Mask type 

Mask descriptor 

Sink node abdrees 


0 
NMLS$K_RCVBFLEN, BYTE), 
NMLSK_SNDBFLEN, BYTE), 


gee -ENTRYLEN), 


EITSK_ENTRYLEN], 
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' 
NPARSE argument block structure definitions 


MACRO 
SNPA_ARGDEF = 
BUILTIN 
BIND ~ 
NPARSE_BLOCK = AP : REF SNPA_BLKDEF; 


! NPARSE argument block definition macro 


ACRO 
SNPA_BLKDEF = 
BBLOCK CNPASK_LENGTHO) 


; H 
Buffer Length parameters. 


LITERAL 


NMLSK_RCVBFLEN = 215. ! Receive buffer length 
NMLSK_SNDBFLEN = 512, ' Send buffer Length 
NMLSK_NFBBFLEN = $28 ' Max size for an NFB. 
SK_QIOBFLEN = 306, ! Q10 buffer Length 
NMLSK_P2BUFLEN = 104 ! Max length for P2 buffers. 
NMLSK_SECBFLEN = 1024, ' Record buffer length 
NMLSK_ENTBUFLEN = 64, ! Entity name buffer size. 


i Maximum bytes of data in a permanent database record. Leaves room 
! for the node keys (which take up the most room) at the beginning of 
: the record. 


NMLSK_MAX_REC_DATA = NMLSK_RECBFLEN - NMNSK_NODE_KEYS_LEN, 
NMLS$K_PERM_KEYS_LEN = 2; : 


except the node database. 
: Parameter descriptor block (PDB) definitions. 


LITERAL PDBSK_NUMBER = 32; ! Number of parameter descriptor sicts 
MACRO PDBS$W_INDEX = 0,0,16,02; ! Parameter change table (CPT) index 
MACRO PDB$W_COUNT = 1,0,16,02%; ! Parameter byte count 

MACRO PDBSA_POINTER = 2,0,32,0%; ! Pointer to parameter value 

LITERAL PDBS$K_SIZE = 8; ! Size of parameter descriptor entry 


Key Length for all permanent databases 


ENT CORPORATION 
ND PROPRIETARY 


m0280 vax7vms v4_o C * 


D=8 


